home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / networking / amitcp / amitalk152.lha / AmiTALK / Install < prev    next >
Encoding:
Text File  |  1995-03-18  |  3.3 KB  |  112 lines
  1. ;
  2. ; AmiTALK Installation Script $VER:AmiTALK V1.10 (28.11.94)
  3. ;
  4.  
  5. (set oldUserLevel (user 3))
  6. (message
  7.  "\nWelcome to the AmiTALK 1.51 installer script.\n\n"
  8.  "Follow the installer script's instructions to install AmiTALK on your "
  9.  "system."
  10. )
  11. (user oldUserLevel)
  12.  
  13. (set network
  14.      (askchoice
  15.       (prompt "Which version of AmiTALK would you like to have installed?")
  16.       (choices "AmiTCP" "AS225")
  17.       (help "Select AmiTCP for the AmiTCP version and AS225 for the AS225 version.")))
  18.  
  19. (if network
  20.     (
  21.      (copyfiles
  22.       (prompt ("Copying talk to inet:c"))
  23.       (help @copyfiles-help)
  24.       (source "as225-talk")
  25.       (newname "talk")
  26.       (dest "inet:c")))
  27.   (
  28.    (copyfiles
  29.     (prompt ("Copying talk to amitcp:bin"))
  30.     (help @copyfiles-help)
  31.     (source "amitcp-talk")
  32.     (newname "talk")
  33.     (dest "amitcp:bin"))))
  34.  
  35. (if network
  36.     (
  37.      (copyfiles
  38.       (prompt ("Copying talkd to inet:serv"))
  39.       (help @copyfiles-help)
  40.       (source "as225-talkd")
  41.       (newname "talkd")
  42.       (dest "inet:serv")))
  43.   (
  44.    (copyfiles
  45.     (prompt ("Copying talkd to amitcp:serv"))
  46.     (help @copyfiles-help)
  47.     (source "amitcp-talkd")
  48.     (newname "talkd")
  49.     (dest "amitcp:serv"))))
  50.  
  51. ((select
  52.   (askchoice
  53.     (prompt "Which method of incoming notification would you like?")
  54.     (choices "RexxReqTools" "KS 3.0+ notification" "CNet")
  55.     (help "For the RexxReqTools version, you must install RexxReqTools."
  56.           "The KS 3.0+ version requires Kickstart 3.0 or greater."
  57.           "CNet is to notify users currently online CNet that they have"
  58.           "an incoming talk request.  Use CNet only if you are a CNET"
  59.           "sysop."))
  60.    (set @notify-choice "reqtools.talkrequest.rexx")
  61.    (set @notify-choice "30.talkrequest.rexx")
  62.    (set @notify-choice "cnet.talkrequest.rexx")))
  63.  
  64. (if network
  65.     (set @dest-dir "inet:c/")
  66.   (set @dest-dir "amitcp:bin/"))
  67.  
  68. (copyfiles
  69.  (prompt ("Copying %s to %s" @notify-choice @dest-dir))
  70.  (help @copyfiles-help)
  71.  (source @notify-choice)
  72.  (newname "talkrequest.rexx")
  73.  (dest @dest-dir))
  74.   
  75. (if network
  76.     (run ("protect inet:c/talkrequest.rexx +s"))
  77.   (run ("protect amitcp:bin/talkrequest.rexx +s")))
  78.  
  79.  
  80. (if
  81.     (askbool
  82.      (prompt "Would you like the proper line to be added to inetd.conf?")
  83.      (help "For AmiTALK to work properly, a line must be added to inetd.conf."
  84.        "  If you have ever installed AmiTALK before, there is no need to repeat "
  85.        "this step.  If this is your first time installing AmiTALK, please let "
  86.        "the installer add this line.")
  87.      (default 1))
  88.  
  89.     (if network
  90.     (
  91.       (copyfiles
  92.         (prompt ("Copying inet:db/inetd.conf to inet:db/inetd.conf.backup"))
  93.        (source "inet:db/inetd.conf")
  94.        (dest "inet:db/")
  95.        (newname "inetd.conf.backup"))
  96.      (run ("join inet:db/inetd.conf.backup as225-inetd.addme to inet:db/inetd.conf")))
  97.       (
  98.       (copyfiles
  99.         (prompt ("Copying amitcp:db/inetd.conf to amitcp:db/inetd.conf.backup"))
  100.        (source "amitcp:db/inetd.conf")
  101.        (dest "amitcp:db/")
  102.        (newname "inetd.conf.backup"))
  103.        (run ("join amitcp:db/inetd.conf.backup amitcp-inetd.addme to amitcp:db/inetd.conf")))))
  104.  
  105. (set oldUserLevel (user 3))
  106. (message
  107.  ("\nAmiTALK is now installed.  Please reboot before attempting to use it.\n\nIf you have any questions, feel free to contact me via e-mail at:\n\ngunnbr@nextwork.rose-hulman.edu")
  108.  )
  109. (user oldUserLevel)
  110.  
  111. (exit (quiet))
  112.